-- background: 2679 from stack: in.11
-- bmap block id: 3289
-- flags: 0000
-- background id: 0
-- name: 


-- part 5 (field)
-- low flags: 01
-- high flags: 2000
-- rect: left=20 top=33 right=278 bottom=484
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: text


-- part 6 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=177 top=288 right=317 bottom=209
-- title width / last selected line: 0
-- icon id / first selected line: 902 / 902
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: prev
----- HyperTalk script -----
on mouseUp
  visual wipe right
  go prev card
  put "Page" && the number of this card into bkgnd field page
end mouseUp



-- part 7 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=295 top=288 right=317 bottom=327
-- title width / last selected line: 0
-- icon id / first selected line: 26425 / 26425
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: next
----- HyperTalk script -----
on mouseUp
  visual wipe left
  go next card
  put "Page" && the number of this card into bkgnd field page
end mouseUp



-- part 8 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=220 top=297 right=312 bottom=285
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: page


-- part 10 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=447 top=290 right=317 bottom=483
-- title width / last selected line: 0
-- icon id / first selected line: 11645 / 11645
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: random
----- HyperTalk script -----
on mouseUp
  set the cursor to 4
  set lockscreen to true
  push this card
  go to card "Title Card"
  put card field cards into theList
  pop card
  set lockscreen to false
  DoList "Card","Cancel",theList,one,"Pick a card. Any card."
  get the result
  if it is not empty then
    visual dissolve
    go to card item 1 of it
  end if
end mouseUp